Break Case LibreOffice 的函数 Calc

BREAKCASE() 说明

BREAKCASE() 函数旨在将带有分隔符的文本拆分为单独的单词，即该函数以以下格式返回结果： «break case function» 。

Break Case 首先将由空格、连字符或下划线分隔的单词字符串分解为单个元素，然后将所有单词转换为小写，并将它们组合成带有空分隔符 (" ") 的单个句子。

BREAKCASE() 函数在编程中非常有用，可根据可接受的代码编写约定转换变量名称 (coding conventions) 。

StarBASIC 函数代码 Break Case

以下是创建自定义函数的宏代码，该函数可以将 LibreOffice Calc 中的文本分解为单个单词 (Break Case)。

打开菜单 Tools - Macros - Edit Macros...，选择 Module1 并将以下文本复制到模块中：

Function BreakCase(ByVal str As String) As String
  'moonexcel.com.ua
  Dim FCalc As Object
  
  FCalc = CreateUnoService("com.sun.star.sheet.FunctionAccess")
  
  str = Replace(str,"-"," ")
  str = Replace(str,"_"," ")  
  str = FCalc.callFunction("TRIM", Array(str))  
  str = FCalc.callFunction("REGEX", Array(str,"([:lower:])([:upper:])","$1 $2","g"))
  
  BreakCase = LCase(str)        
End Function

然后关闭 Macro Editor，返回到 LibreOffice Calc 并在任何单元格中使用我们的新函数。

使用扩展

您还可以使用该功能 BREAKCASE() 通过安装免费扩展 YouLibreCalc.oxt 或其全功能版本 YLC_Utilities.oxt 。

之后，该功能将在 LibreOffice Calc 中打开的所有文件中可用。